#!/usr/local/bin/perl
use warnings;
sub main()
{
return 1;
}

print main()."\n";
